home *** CD-ROM | disk | FTP | other *** search
/ Floppyshop 2 / Floppyshop - 2.zip / Floppyshop - 2.iso / art&graf.ix / art-0039 / source / manywind.inc < prev    next >
Text File  |  1997-04-16  |  2KB  |  68 lines

  1. (* INCLUDE FOR  ManyWindows ; *)
  2.  
  3. FROM Window IMPORT
  4.     Components,
  5.       (* =(AESWNU1,AESWNU2,AESWNU3,AESWNU4, (*top 4 bits unused *)
  6.             HSLIDE,      (*horizontal slider*)
  7.             RTARROW,     (*right arrow*)
  8.             LFARROW,     (*left arrow*)
  9.             VSLIDE,    (*vertical slider*)
  10.             DNARROW,    (*down arrow*)
  11.             UPARROW,    (*up arrow*)
  12.             RESIZE,    (*re-size box*)
  13.             INFO,    (*information line*)
  14.             MOVE,    (*move box*)
  15.             FULL,    (*full box*)
  16.             CLOSE,    (*close box*)
  17.             NAME);    (*title bar with name*)  *)
  18.     ComponentSet;
  19.  
  20. FROM    ManyWindows     IMPORT
  21.     XYWHRect,
  22.     CornersRect,
  23.  
  24.     WindowStates,     (* = ( open, full, topped );     *)
  25.         WindowSSet,       (*  = SET OF WindowStates;    *)
  26.  
  27.     WindowPtr,    (*  = POINTER TO AWindow;    *)
  28.  
  29.         AWindow,    (*  = RECORD
  30.              Handle      : INTEGER; (* The AES window handle *)
  31.              State      : WindowSSet;
  32.              Outer,
  33.              Workarea,
  34.          PrevSize     : WindowCoordinate;
  35.              Components : ComponentSet;
  36.              Font         : FontData;                      
  37.          Title        : String;
  38.            END;  (* Window *)         
  39.  
  40. VAR    *)
  41.   AESApplId,     
  42.   VDIHandle, 
  43.   ScreenResolution,
  44.                ShowAlert,
  45.                            StartApplication, 
  46.                            CreateAWindow,
  47.                            SetAWindowTitle,
  48.                            OpenAWindow,
  49.                            ClearAWindow,
  50.                            CloseAWindow,
  51.                            DeleteAWindow,
  52.                            TerminateApplication,
  53.                            SetUpdateRect,
  54.                ResetRectRect,
  55.                GetNextRect,
  56.  
  57. (* various conversion / translation utilities *)
  58.                            ToXYWHRect,
  59.                            ToCornersRect,
  60.                            QueryIntersect,
  61.                            GetWindowHandle,
  62.                            GetWindowPtr,
  63.                            BeginScreenUpdate,
  64.                            EndScreenUpdate, 
  65.                            ShowMouse,
  66.                            HideMouse;
  67. (* END ManyWindows.    *)